home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 July / Macworld (1999-07).dmg / Shareware World / Info / For Developers / Mops 3.4.sea / Mops source / Toolbox classes / Window+ < prev   
MacBinary  |  1999-02-06  |  5.5 KB  |  [TEXT/MSET]
open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was processed as: MacBinary (archive/macBinary).

You can browse this item here: Window+

ConfidenceProgramDetectionMatch TypeSupport
10% dexvert MacBinary (archive/macBinary) fallback Supported
1% dexvert Text File (text/txt) fallback Supported
100% file MacBinary II, inited, Sat Feb 6 12:17:55 1999, modified Sat Feb 6 12:17:55 1999, creator 'MSET', type ASCII, 5038 bytes "Window+" , at 0x142e 381 bytes resource default (weak)
99% file data default
74% TrID Macintosh plain text (MacBinary) default
25% TrID MacBinary 2 default (weak)
100% lsar MacBinary default


id metadata
keyvalue
macFileType[TEXT]
macFileCreator[MSET]


hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 07 57 69 6e 64 6f 77 | 2b 00 00 00 00 00 00 00 |..Window|+.......|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 53 45 | 54 01 00 00 00 00 00 00 |.TEXTMSE|T.......|
|00000050| 00 00 00 00 00 13 ae 00 | 00 01 7d b2 e2 29 c3 b2 |........|..}..)..|
|00000060| e2 29 c3 00 00 08 00 00 | 00 00 00 00 00 00 00 00 |.)......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 6c c7 00 00 |........|....l...|
|00000080| 5c 20 57 69 6e 64 6f 77 | 2b 20 63 6c 61 73 73 20 |\ Window|+ class |
|00000090| 2d 20 61 20 77 69 6e 64 | 6f 77 20 74 68 61 74 20 |- a wind|ow that |
|000000a0| 73 75 70 70 6f 72 74 73 | 20 76 69 65 77 73 2e 0d |supports| views..|
|000000b0| 0d 5c 20 4f 63 74 20 39 | 31 09 6d 72 68 09 49 6e |.\ Oct 9|1.mrh.In|
|000000c0| 69 74 69 61 6c 20 76 65 | 72 73 69 6f 6e 2e 0d 5c |itial ve|rsion..\|
|000000d0| 20 4d 61 79 20 39 32 09 | 6d 72 68 09 22 4e 65 77 | May 92.|mrh."New|
|000000e0| 2d 73 74 79 6c 65 22 20 | 63 6f 6e 74 72 6f 6c 73 |-style" |controls|
|000000f0| 0d 5c 20 46 65 62 20 39 | 33 09 6d 72 68 09 41 64 |.\ Feb 9|3.mrh.Ad|
|00000100| 64 65 64 20 73 65 6e 64 | 69 6e 67 20 69 64 6c 65 |ded send|ing idle|
|00000110| 3a 20 74 6f 20 74 68 65 | 20 63 6f 6e 74 56 69 65 |: to the| contVie|
|00000120| 77 0d 5c 20 53 65 70 74 | 20 39 33 09 6d 72 68 09 |w.\ Sept| 93.mrh.|
|00000130| 52 65 76 69 73 65 64 20 | 66 6f 72 20 43 6f 6e 74 |Revised |for Cont|
|00000140| 72 6f 6c 20 6e 6f 77 20 | 62 65 69 6e 67 20 61 20 |rol now |being a |
|00000150| 56 69 65 77 20 73 75 62 | 63 6c 61 73 73 2e 0d 0d |View sub|class...|
|00000160| 6e 65 65 64 09 76 69 65 | 77 0d 6e 65 65 64 09 73 |need.vie|w.need.s|
|00000170| 63 72 6f 6c 6c 65 72 0d | 0d 72 65 63 74 09 61 52 |croller.|.rect.aR|
|00000180| 65 63 74 0d 0d 3a 63 6c | 61 73 73 09 57 49 4e 44 |ect..:cl|ass.WIND|
|00000190| 4f 57 2b 20 20 73 75 70 | 65 72 7b 20 77 69 6e 64 |OW+  sup|er{ wind|
|000001a0| 6f 77 20 7d 0d 72 65 63 | 6f 72 64 0d 7b 09 70 74 |ow }.rec|ord.{.pt|
|000001b0| 72 09 09 5e 63 6f 6e 74 | 76 69 65 77 09 09 5c 20 |r..^cont|view..\ |
|000001c0| 70 6f 69 6e 74 73 20 74 | 6f 20 76 69 65 77 20 63 |points t|o view c|
|000001d0| 6f 6e 73 69 73 74 69 6e | 67 20 6f 66 20 63 6f 6e |onsistin|g of con|
|000001e0| 74 65 6e 74 73 20 72 65 | 63 74 2e 0d 09 62 6f 6f |tents re|ct...boo|
|000001f0| 6c 09 7a 6f 6f 6d 66 6c | 67 0d 7d 0d 0d 70 72 69 |l.zoomfl|g.}..pri|
|00000200| 76 61 74 65 0d 0d 3a 6d | 20 53 65 74 43 6f 6e 74 |vate..:m| SetCont|
|00000210| 56 69 65 77 42 6f 75 6e | 64 73 3a 20 20 7b 20 5c |ViewBoun|ds:  { \|
|00000220| 20 6c 20 74 20 72 20 62 | 20 2d 2d 20 7d 0d 09 67 | l t r b| -- }..g|
|00000230| 65 74 52 65 63 74 3a 20 | 73 75 70 65 72 20 20 2d |etRect: |super  -|
|00000240| 3e 20 62 20 2d 3e 20 72 | 20 2d 3e 20 74 20 2d 3e |> b -> r| -> t ->|
|00000250| 20 6c 0d 09 6c 20 74 20 | 72 20 31 2b 20 62 20 31 | l..l t |r 1+ b 1|
|00000260| 2b 20 20 73 65 74 42 6f | 75 6e 64 73 3a 20 5b 20 |+  setBo|unds: [ |
|00000270| 67 65 74 3a 20 5e 63 6f | 6e 74 56 69 65 77 20 5d |get: ^co|ntView ]|
|00000280| 0d 09 6d 6f 76 65 64 3a | 20 5b 20 67 65 74 3a 20 |..moved:| [ get: |
|00000290| 5e 63 6f 6e 74 56 69 65 | 77 20 5d 0d 09 30 20 30 |^contVie|w ]..0 0|
|000002a0| 20 33 32 30 30 30 20 64 | 75 70 20 20 70 75 74 3a | 32000 d|up  put:|
|000002b0| 20 74 65 6d 70 52 65 63 | 74 20 20 75 70 64 61 74 | tempRec|t  updat|
|000002c0| 65 3a 20 74 65 6d 70 52 | 65 63 74 0d 3b 6d 0d 0d |e: tempR|ect.;m..|
|000002d0| 70 75 62 6c 69 63 0d 0d | 3a 6d 20 53 45 54 5a 4f |public..|:m SETZO|
|000002e0| 4f 4d 3a 09 09 5c 20 28 | 20 62 20 2d 2d 20 29 20 |OM:..\ (| b -- ) |
|000002f0| 20 50 61 73 73 65 64 2d | 69 6e 20 62 6f 6f 6c 65 | Passed-|in boole|
|00000300| 61 6e 20 69 6e 64 69 63 | 61 74 65 73 20 69 66 20 |an indic|ates if |
|00000310| 74 68 69 73 20 77 69 6e | 64 6f 77 0d 09 09 09 09 |this win|dow.....|
|00000320| 5c 09 09 77 69 6c 6c 20 | 62 65 20 20 7a 6f 6f 6d |\..will |be  zoom|
|00000330| 61 62 6c 65 2e 0d 09 70 | 75 74 3a 20 7a 6f 6f 6d |able...p|ut: zoom|
|00000340| 46 6c 67 20 20 3b 6d 0d | 0d 3a 6d 20 53 45 54 56 |Flg  ;m.|.:m SETV|
|00000350| 49 45 57 3a 20 20 7b 20 | 5e 76 69 65 77 20 2d 2d |IEW:  { |^view --|
|00000360| 20 7d 0d 09 5e 76 69 65 | 77 20 20 70 75 74 3a 20 | }..^vie|w  put: |
|00000370| 5e 63 6f 6e 74 56 69 65 | 77 20 20 5e 62 61 73 65 |^contVie|w  ^base|
|00000380| 20 73 65 74 57 69 6e 64 | 6f 77 3a 20 5b 20 5e 76 | setWind|ow: [ ^v|
|00000390| 69 65 77 20 5d 20 20 3b | 6d 0d 0d 3a 6d 20 47 45 |iew ]  ;|m..:m GE|
|000003a0| 54 56 49 45 57 3a 09 67 | 65 74 3a 20 5e 63 6f 6e |TVIEW:.g|et: ^con|
|000003b0| 74 56 69 65 77 20 20 3b | 6d 0d 0d 0d 3a 6d 20 4e |tView  ;|m...:m N|
|000003c0| 45 57 3a 20 20 7b 20 62 | 6e 64 73 52 65 63 74 20 |EW:  { b|ndsRect |
|000003d0| 74 41 64 64 72 20 74 4c | 65 6e 20 70 72 6f 63 49 |tAddr tL|en procI|
|000003e0| 44 20 76 69 73 20 67 6f | 41 77 61 79 20 5e 76 69 |D vis go|Away ^vi|
|000003f0| 65 77 20 5c 20 73 32 35 | 35 20 2d 2d 20 7d 0d 0d |ew \ s25|5 -- }..|
|00000400| 09 67 65 74 3a 20 61 6c | 69 76 65 20 20 3f 45 58 |.get: al|ive  ?EX|
|00000410| 49 54 09 09 09 09 09 09 | 5c 20 4f 75 74 20 69 66 |IT......|\ Out if|
|00000420| 20 61 6c 72 65 61 64 79 | 20 61 6c 69 76 65 0d 09 | already| alive..|
|00000430| 5e 76 69 65 77 20 20 73 | 65 74 56 69 65 77 3a 20 |^view  s|etView: |
|00000440| 73 65 6c 66 0d 5c 09 3f | 64 69 73 61 62 6c 65 5f |self.\.?|disable_|
|00000450| 61 63 74 57 0d 09 74 41 | 64 64 72 20 74 4c 65 6e |actW..tA|ddr tLen|
|00000460| 20 20 73 74 72 32 35 35 | 20 20 2d 3e 20 73 32 35 |  str255|  -> s25|
|00000470| 35 0d 09 5e 62 61 73 65 | 20 20 62 6e 64 73 72 65 |5..^base|  bndsre|
|00000480| 63 74 20 20 73 32 35 35 | 0d 09 76 69 73 20 31 20 |ct  s255|..vis 1 |
|00000490| 61 6e 64 0d 09 67 65 74 | 3a 20 7a 6f 6f 6d 46 6c |and..get|: zoomFl|
|000004a0| 67 20 20 38 20 61 6e 64 | 20 20 70 72 6f 63 49 44 |g  8 and|  procID|
|000004b0| 20 2b 0d 09 69 6e 46 72 | 6f 6e 74 20 20 67 6f 41 | +..inFr|ont  goA|
|000004c0| 77 61 79 20 31 20 61 6e | 64 0d 09 30 09 09 09 09 |way 1 an|d..0....|
|000004d0| 09 09 09 09 5c 20 64 65 | 66 61 75 6c 74 20 69 73 |....\ de|fault is|
|000004e0| 20 69 6e 69 74 69 61 6c | 6c 79 20 69 6e 20 66 72 | initial|ly in fr|
|000004f0| 6f 6e 74 0d 09 67 65 74 | 3a 20 63 6f 6c 6f 72 3f |ont..get|: color?|
|00000500| 0d 09 49 46 20 20 4e 65 | 77 43 57 69 6e 64 6f 77 |..IF  Ne|wCWindow|
|00000510| 20 20 45 4c 53 45 20 20 | 4e 65 77 57 69 6e 64 6f |  ELSE  |NewWindo|
|00000520| 77 20 20 54 48 45 4e 20 | 20 64 72 6f 70 0d 09 69 |w  THEN | drop..i|
|00000530| 6e 69 74 4e 65 77 57 69 | 6e 64 6f 77 3a 20 73 65 |nitNewWi|ndow: se|
|00000540| 6c 66 0d 09 73 65 74 43 | 6f 6e 74 56 69 65 77 42 |lf..setC|ontViewB|
|00000550| 6f 75 6e 64 73 3a 20 73 | 65 6c 66 0d 09 5e 76 69 |ounds: s|elf..^vi|
|00000560| 65 77 20 20 70 75 74 3a | 20 5e 76 69 65 77 5f 69 |ew  put:| ^view_i|
|00000570| 6e 5f 66 6f 63 75 73 09 | 09 5c 20 69 6e 69 74 69 |n_focus.|.\ initi|
|00000580| 61 6c 20 64 65 66 61 75 | 6c 74 0d 09 6e 65 77 3a |al defau|lt..new:|
|00000590| 20 5b 20 67 65 74 3a 20 | 5e 63 6f 6e 74 56 69 65 | [ get: |^contVie|
|000005a0| 77 20 5d 09 09 09 5c 20 | 46 69 72 65 20 75 70 20 |w ]...\ |Fire up |
|000005b0| 76 69 65 77 20 6f 62 6a | 65 63 74 0d 3b 6d 0d 0d |view obj|ect.;m..|
|000005c0| 0d 3a 6d 20 47 45 54 4e | 45 57 3a 20 20 7b 20 72 |.:m GETN|EW:  { r|
|000005d0| 65 73 49 44 20 5e 76 69 | 65 77 20 2d 2d 20 7d 0d |esID ^vi|ew -- }.|
|000005e0| 09 67 65 74 3a 20 61 6c | 69 76 65 20 20 3f 45 58 |.get: al|ive  ?EX|
|000005f0| 49 54 09 09 09 09 5c 20 | 4f 75 74 20 69 66 20 61 |IT....\ |Out if a|
|00000600| 6c 72 65 61 64 79 20 61 | 6c 69 76 65 0d 09 5e 76 |lready a|live..^v|
|00000610| 69 65 77 20 20 73 65 74 | 56 69 65 77 3a 20 73 65 |iew  set|View: se|
|00000620| 6c 66 0d 09 72 65 73 49 | 44 20 20 67 65 74 6e 65 |lf..resI|D  getne|
|00000630| 77 3a 20 73 75 70 65 72 | 0d 09 73 65 74 43 6f 6e |w: super|..setCon|
|00000640| 74 56 69 65 77 42 6f 75 | 6e 64 73 3a 20 73 65 6c |tViewBou|nds: sel|
|00000650| 66 0d 09 5e 76 69 65 77 | 20 20 70 75 74 3a 20 5e |f..^view|  put: ^|
|00000660| 76 69 65 77 5f 69 6e 5f | 66 6f 63 75 73 09 09 5c |view_in_|focus..\|
|00000670| 20 69 6e 69 74 69 61 6c | 20 64 65 66 61 75 6c 74 | initial| default|
|00000680| 0d 09 6e 65 77 3a 20 5b | 20 67 65 74 3a 20 5e 63 |..new: [| get: ^c|
|00000690| 6f 6e 74 56 69 65 77 20 | 5d 09 09 09 5c 20 46 69 |ontView |]...\ Fi|
|000006a0| 72 65 20 75 70 20 76 69 | 65 77 20 6f 62 6a 65 63 |re up vi|ew objec|
|000006b0| 74 0d 3b 6d 0d 0d 0d 3a | 6d 20 47 52 4f 57 3a 0d |t.;m...:|m GROW:.|
|000006c0| 09 67 72 6f 77 3a 20 73 | 75 70 65 72 20 20 73 65 |.grow: s|uper  se|
|000006d0| 74 3a 20 73 75 70 65 72 | 0d 09 73 65 74 43 6f 6e |t: super|..setCon|
|000006e0| 74 56 69 65 77 42 6f 75 | 6e 64 73 3a 20 73 65 6c |tViewBou|nds: sel|
|000006f0| 66 20 20 3b 6d 0d 0d 3a | 6d 20 5a 4f 4f 4d 3a 0d |f  ;m..:|m ZOOM:.|
|00000700| 09 7a 6f 6f 6d 3a 20 73 | 75 70 65 72 20 20 73 65 |.zoom: s|uper  se|
|00000710| 74 3a 20 73 75 70 65 72 | 0d 09 73 65 74 43 6f 6e |t: super|..setCon|
|00000720| 74 56 69 65 77 42 6f 75 | 6e 64 73 3a 20 73 65 6c |tViewBou|nds: sel|
|00000730| 66 20 20 3b 6d 0d 0d 0d | 3a 6d 20 45 4e 41 42 4c |f  ;m...|:m ENABL|
|00000740| 45 3a 0d 09 65 6e 61 62 | 6c 65 3a 20 73 75 70 65 |E:..enab|le: supe|
|00000750| 72 09 09 5c 20 4e 6f 74 | 65 20 2d 20 77 65 20 64 |r..\ Not|e - we d|
|00000760| 6f 20 74 68 69 73 20 66 | 69 72 73 74 20 74 6f 20 |o this f|irst to |
|00000770| 6d 61 6b 65 20 73 75 72 | 65 20 74 68 65 0d 09 09 |make sur|e the...|
|00000780| 09 09 09 09 5c 20 63 75 | 72 72 65 6e 74 20 67 72 |....\ cu|rrent gr|
|00000790| 61 66 50 6f 72 74 20 69 | 73 20 73 65 74 20 62 65 |afPort i|s set be|
|000007a0| 66 6f 72 65 20 74 68 65 | 20 76 69 65 77 73 0d 09 |fore the| views..|
|000007b0| 09 09 09 09 09 5c 20 64 | 6f 20 61 6e 79 74 68 69 |.....\ d|o anythi|
|000007c0| 6e 67 2e 0d 09 67 65 74 | 3a 20 5e 63 6f 6e 74 56 |ng...get|: ^contV|
|000007d0| 69 65 77 20 20 65 6e 61 | 62 6c 65 3a 20 5b 5d 0d |iew  ena|ble: [].|
|000007e0| 3b 6d 0d 0d 3a 6d 20 44 | 49 53 41 42 4c 45 3a 0d |;m..:m D|ISABLE:.|
|000007f0| 09 67 65 74 3a 20 5e 63 | 6f 6e 74 56 69 65 77 20 |.get: ^c|ontView |
|00000800| 20 64 69 73 61 62 6c 65 | 3a 20 5b 5d 20 20 64 69 | disable|: []  di|
|00000810| 73 61 62 6c 65 3a 20 73 | 75 70 65 72 0d 3b 6d 0d |sable: s|uper.;m.|
|00000820| 0d 3a 6d 20 28 44 52 41 | 57 29 3a 0d 09 28 64 72 |.:m (DRA|W):..(dr|
|00000830| 61 77 29 3a 20 73 75 70 | 65 72 0d 09 67 65 74 3a |aw): sup|er..get:|
|00000840| 20 5e 63 6f 6e 74 76 69 | 65 77 20 20 64 72 61 77 | ^contvi|ew  draw|
|00000850| 3a 20 5b 5d 0d 3b 6d 0d | 0d 3a 6d 20 44 52 41 57 |: [].;m.|.:m DRAW|
|00000860| 3a 09 28 64 72 61 77 29 | 3a 20 73 65 6c 66 0d 09 |:.(draw)|: self..|
|00000870| 09 09 28 20 6e 6f 63 6c | 69 70 20 29 20 20 3b 6d |..( nocl|ip )  ;m|
|00000880| 09 09 5c 20 49 74 20 73 | 65 65 6d 73 20 74 68 61 |..\ It s|eems tha|
|00000890| 74 20 77 68 65 6e 20 49 | 20 68 61 76 65 20 73 63 |t when I| have sc|
|000008a0| 72 6f 6c 6c 20 62 61 72 | 73 20 74 68 65 0d 09 09 |roll bar|s the...|
|000008b0| 09 09 09 09 09 5c 20 20 | 67 72 6f 77 20 69 63 6f |.....\  |grow ico|
|000008c0| 6e 20 67 65 74 73 20 63 | 6c 69 70 70 65 64 20 6f |n gets c|lipped o|
|000008d0| 75 74 20 75 6e 6c 65 73 | 73 20 49 20 63 61 6c 6c |ut unles|s I call|
|000008e0| 0d 09 09 09 09 09 09 09 | 5c 20 20 6e 6f 43 6c 69 |........|\  noCli|
|000008f0| 70 20 68 65 72 65 2e 20 | 20 28 54 68 65 20 63 61 |p here. | (The ca|
|00000900| 6c 6c 4c 61 73 74 20 72 | 6f 75 74 69 6e 65 0d 09 |llLast r|outine..|
|00000910| 09 09 09 09 09 09 5c 20 | 20 77 69 6e 64 75 70 44 |......\ | windupD|
|00000920| 72 61 77 3a 20 69 73 20 | 77 68 65 72 65 20 69 74 |raw: is |where it|
|00000930| 27 73 20 61 63 74 75 61 | 6c 6c 79 20 64 72 61 77 |'s actua|lly draw|
|00000940| 6e 29 2e 0d 0d 5c 20 49 | 44 4c 45 3a 20 63 61 6c |n)...\ I|DLE: cal|
|00000950| 6c 73 20 49 44 4c 45 3a | 20 6f 6e 20 74 68 65 20 |ls IDLE:| on the |
|00000960| 63 6f 6e 74 56 69 65 77 | 20 28 77 68 69 63 68 20 |contView| (which |
|00000970| 77 69 6c 6c 20 6c 65 61 | 64 20 74 6f 20 69 74 20 |will lea|d to it |
|00000980| 62 65 69 6e 67 20 63 61 | 6c 6c 65 64 20 6f 6e 0d |being ca|lled on.|
|00000990| 5c 20 20 61 6c 6c 20 76 | 69 65 77 73 29 2e 20 20 |\  all v|iews).  |
|000009a0| 57 65 20 64 6f 20 74 68 | 69 73 20 72 65 67 61 72 |We do th|is regar|
|000009b0| 64 6c 65 73 73 20 6f 66 | 20 77 68 61 74 20 76 69 |dless of| what vi|
|000009c0| 65 77 20 69 73 20 69 6e | 20 66 6f 63 75 73 2c 20 |ew is in| focus, |
|000009d0| 74 6f 20 67 69 76 65 0d | 5c 20 20 76 69 65 77 73 |to give.|\  views|
|000009e0| 20 61 20 63 68 61 6e 63 | 65 20 74 6f 20 64 6f 20 | a chanc|e to do |
|000009f0| 62 61 63 6b 67 72 6f 75 | 6e 64 20 73 74 75 66 66 |backgrou|nd stuff|
|00000a00| 2e 0d 5c 20 57 65 20 65 | 6e 73 75 72 65 20 74 68 |..\ We e|nsure th|
|00000a10| 69 73 20 77 69 6e 64 6f | 77 20 69 73 20 74 68 65 |is windo|w is the|
|00000a20| 20 63 75 72 72 65 6e 74 | 20 47 72 61 66 70 6f 72 | current| Grafpor|
|00000a30| 74 2c 20 73 69 6e 63 65 | 20 74 68 65 20 76 69 65 |t, since| the vie|
|00000a40| 77 73 0d 5c 20 6d 69 67 | 68 74 20 77 61 6e 74 20 |ws.\ mig|ht want |
|00000a50| 74 6f 20 6c 6f 6f 6b 20 | 61 74 20 74 68 65 20 6d |to look |at the m|
|00000a60| 6f 75 73 65 20 70 6f 73 | 69 74 69 6f 6e 20 69 6e |ouse pos|ition in|
|00000a70| 20 6c 6f 63 61 6c 20 63 | 6f 6f 72 64 69 6e 61 74 | local c|oordinat|
|00000a80| 65 73 2e 0d 0d 3a 6d 20 | 49 44 4c 45 3a 20 20 20 |es...:m |IDLE:   |
|00000a90| 7b 20 5c 20 78 78 20 2d | 2d 20 7d 0d 09 69 64 6c |{ \ xx -|- }..idl|
|00000aa0| 65 3a 20 73 75 70 65 72 | 0d 09 70 75 73 68 50 6f |e: super|..pushPo|
|00000ab0| 72 74 20 20 73 65 74 3a | 20 73 65 6c 66 0d 09 67 |rt  set:| self..g|
|00000ac0| 65 74 3a 20 5e 63 6f 6e | 74 56 69 65 77 20 20 69 |et: ^con|tView  i|
|00000ad0| 64 6c 65 3a 20 5b 5d 0d | 09 70 6f 70 50 6f 72 74 |dle: [].|.popPort|
|00000ae0| 20 20 3b 6d 0d 0d 0d 3a | 6d 20 43 4c 4f 53 45 3a |  ;m...:|m CLOSE:|
|00000af0| 09 09 5c 20 52 65 6c 65 | 61 73 65 73 20 74 68 65 |..\ Rele|ases the|
|00000b00| 20 76 69 65 77 73 20 61 | 6e 64 20 63 6c 6f 73 65 | views a|nd close|
|00000b10| 73 20 74 68 65 20 77 69 | 6e 64 6f 77 0d 09 67 65 |s the wi|ndow..ge|
|00000b20| 74 3a 20 5e 63 6f 6e 74 | 56 69 65 77 20 20 72 65 |t: ^cont|View  re|
|00000b30| 6c 65 61 73 65 3a 20 2a | 2a 0d 09 63 6c 6f 73 65 |lease: *|*..close|
|00000b40| 3a 20 73 75 70 65 72 20 | 20 3b 6d 0d 0d 0d 3a 6d |: super | ;m...:m|
|00000b50| 20 43 4f 4e 54 45 4e 54 | 3a 09 09 5c 20 48 61 6e | CONTENT|:..\ Han|
|00000b60| 64 6c 65 73 20 61 20 63 | 6f 6e 74 65 6e 74 20 63 |dles a c|ontent c|
|00000b70| 6c 69 63 6b 2e 20 20 57 | 65 20 63 61 6c 6c 20 74 |lick.  W|e call t|
|00000b80| 68 65 20 63 6f 6e 74 76 | 69 65 77 20 74 6f 20 66 |he contv|iew to f|
|00000b90| 69 6e 64 0d 09 09 09 09 | 5c 20 20 77 68 69 63 68 |ind.....|\  which|
|00000ba0| 20 76 69 65 77 20 28 69 | 66 20 61 6e 79 29 20 77 | view (i|f any) w|
|00000bb0| 61 6e 74 73 20 74 68 65 | 20 63 6c 69 63 6b 2c 20 |ants the| click, |
|00000bc0| 74 68 65 6e 20 73 65 6e | 64 20 43 4c 49 43 4b 3a |then sen|d CLICK:|
|00000bd0| 0d 09 09 09 09 5c 20 20 | 74 6f 20 69 74 2e 0d 09 |.....\  |to it...|
|00000be0| 61 63 74 69 76 65 3a 20 | 73 65 6c 66 0d 09 49 46 |active: |self..IF|
|00000bf0| 09 09 6e 6f 43 6c 69 70 | 0d 09 09 09 67 65 74 3a |..noClip|....get:|
|00000c00| 20 5e 63 6f 6e 74 56 69 | 65 77 20 20 76 69 65 77 | ^contVi|ew  view|
|00000c10| 5f 66 6f 72 5f 63 6c 69 | 63 6b 3f 3a 20 5b 5d 0d |_for_cli|ck?: [].|
|00000c20| 09 09 09 49 46 20 20 63 | 6c 69 63 6b 3a 20 5b 5d |...IF  c|lick: []|
|00000c30| 20 20 54 48 45 4e 09 0d | 09 45 4c 53 45 09 73 65 |  THEN..|.ELSE.se|
|00000c40| 6c 65 63 74 3a 20 73 65 | 6c 66 0d 09 54 48 45 4e |lect: se|lf..THEN|
|00000c50| 20 20 3b 6d 0d 0d 0d 3a | 6d 20 4b 45 59 3a 09 09 |  ;m...:|m KEY:..|
|00000c60| 5c 20 28 20 63 20 2d 2d | 20 29 20 20 46 6f 72 20 |\ ( c --| )  For |
|00000c70| 74 79 70 65 64 20 6b 65 | 79 73 2c 20 77 65 20 73 |typed ke|ys, we s|
|00000c80| 65 6e 64 20 61 20 4b 45 | 59 3a 20 74 6f 20 74 68 |end a KE|Y: to th|
|00000c90| 65 0d 09 09 09 5c 20 76 | 69 65 77 20 69 6e 20 66 |e....\ v|iew in f|
|00000ca0| 6f 63 75 73 2c 20 69 66 | 20 74 68 65 72 65 20 69 |ocus, if| there i|
|00000cb0| 73 20 6f 6e 65 2e 0d 09 | 6e 69 6c 3f 3a 20 5e 76 |s one...|nil?: ^v|
|00000cc0| 69 65 77 5f 69 6e 5f 66 | 6f 63 75 73 0d 09 49 46 |iew_in_f|ocus..IF|
|00000cd0| 09 09 64 72 6f 70 0d 09 | 45 4c 53 45 09 6b 65 79 |..drop..|ELSE.key|
|00000ce0| 3a 20 5b 20 67 65 74 3a | 20 5e 76 69 65 77 5f 69 |: [ get:| ^view_i|
|00000cf0| 6e 5f 66 6f 63 75 73 20 | 5d 0d 09 54 48 45 4e 20 |n_focus |]..THEN |
|00000d00| 20 3b 6d 0d 09 0d 0d 3a | 6d 20 54 45 53 54 3a 20 | ;m....:|m TEST: |
|00000d10| 20 7b 20 5e 76 69 65 77 | 20 2d 2d 20 7d 0d 09 73 | { ^view| -- }..s|
|00000d20| 63 72 65 65 6e 62 69 74 | 73 20 74 72 75 65 20 73 |creenbit|s true s|
|00000d30| 65 74 47 72 6f 77 3a 20 | 73 65 6c 66 0d 09 74 72 |etGrow: |self..tr|
|00000d40| 75 65 20 20 73 65 74 5a | 6f 6f 6d 3a 20 73 65 6c |ue  setZ|oom: sel|
|00000d50| 66 0d 09 31 30 30 20 31 | 30 30 20 34 30 30 20 32 |f..100 1|00 400 2|
|00000d60| 30 30 20 70 75 74 3a 20 | 61 52 65 63 74 09 09 5c |00 put: |aRect..\|
|00000d70| 20 63 61 6e 27 74 20 75 | 73 65 20 74 65 6d 70 52 | can't u|se tempR|
|00000d80| 65 63 74 20 2d 20 67 65 | 74 73 20 63 6c 6f 62 62 |ect - ge|ts clobb|
|00000d90| 65 72 65 64 0d 09 61 52 | 65 63 74 20 20 22 20 54 |ered..aR|ect  " T|
|00000da0| 65 73 74 22 20 20 64 6f | 63 57 69 6e 64 20 20 74 |est"  do|cWind  t|
|00000db0| 72 75 65 20 74 72 75 65 | 20 20 5e 76 69 65 77 20 |rue true|  ^view |
|00000dc0| 20 6e 65 77 3a 20 73 65 | 6c 66 20 3b 6d 0d 0d 3a | new: se|lf ;m..:|
|00000dd0| 6d 20 54 45 53 54 52 3a | 20 20 7b 20 72 65 73 49 |m TESTR:|  { resI|
|00000de0| 44 20 5e 76 69 65 77 20 | 2d 2d 20 7d 0d 09 73 63 |D ^view |-- }..sc|
|00000df0| 72 65 65 6e 62 69 74 73 | 20 74 72 75 65 20 73 65 |reenbits| true se|
|00000e00| 74 47 72 6f 77 3a 20 73 | 65 6c 66 0d 09 74 72 75 |tGrow: s|elf..tru|
|00000e10| 65 20 20 73 65 74 5a 6f | 6f 6d 3a 20 73 65 6c 66 |e  setZo|om: self|
|00000e20| 0d 09 72 65 73 49 44 20 | 5e 76 69 65 77 20 20 67 |..resID |^view  g|
|00000e30| 65 74 6e 65 77 3a 20 73 | 65 6c 66 20 20 3b 6d 0d |etnew: s|elf  ;m.|
|00000e40| 0d 3b 63 6c 61 73 73 0d | 0d 0d 65 6e 64 6c 6f 61 |.;class.|..endloa|
|00000e50| 64 0d 0d 5c 20 54 45 53 | 54 49 4e 47 3a 0d 0d 0d |d..\ TES|TING:...|
|00000e60| 77 69 6e 64 6f 77 2b 09 | 09 57 57 0d 73 63 72 6f |window+.|.WW.scro|
|00000e70| 6c 6c 65 72 09 53 31 09 | 09 09 09 09 09 09 5c 20 |ller.S1.|......\ |
|00000e80| 54 68 69 73 20 77 69 6c | 6c 20 62 65 20 74 68 65 |This wil|l be the|
|00000e90| 20 63 6f 6e 74 76 69 65 | 77 20 6f 66 20 57 57 0d | contvie|w of WW.|
|00000ea0| 73 63 72 6f 6c 6c 65 72 | 09 53 32 09 09 09 09 09 |scroller|.S2.....|
|00000eb0| 09 09 5c 20 41 20 63 68 | 69 6c 64 20 6f 66 20 53 |..\ A ch|ild of S|
|00000ec0| 31 20 2d 20 61 6e 6f 74 | 68 65 72 20 73 63 72 6f |1 - anot|her scro|
|00000ed0| 6c 6c 65 72 21 0d 09 09 | 09 32 30 20 32 30 20 20 |ller!...|.20 20  |
|00000ee0| 31 35 30 20 32 30 30 20 | 20 20 73 65 74 42 6f 75 |150 200 |  setBou|
|00000ef0| 6e 64 73 3a 20 73 32 0d | 0d 76 69 65 77 09 09 56 |nds: s2.|.view..V|
|00000f00| 56 09 09 09 09 09 09 09 | 5c 20 41 20 63 68 69 6c |V.......|\ A chil|
|00000f10| 64 20 6f 66 20 53 32 0d | 09 09 09 33 32 20 33 32 |d of S2.|...32 32|
|00000f20| 20 20 36 32 38 20 33 32 | 38 20 20 73 65 74 42 6f |  628 32|8  setBo|
|00000f30| 75 6e 64 73 3a 20 76 76 | 0d 0d 20 20 20 73 63 72 |unds: vv|..   scr|
|00000f40| 65 65 6e 62 69 74 73 09 | 74 72 75 65 20 20 73 65 |eenbits.|true  se|
|00000f50| 74 47 72 6f 77 3a 20 77 | 77 0d 09 09 09 09 74 72 |tGrow: w|w.....tr|
|00000f60| 75 65 20 20 73 65 74 5a | 6f 6f 6d 3a 20 77 77 0d |ue  setZ|oom: ww.|
|00000f70| 0d 3a 20 44 52 57 20 20 | 7b 20 5c 20 6c 20 74 20 |.: DRW  |{ \ l t |
|00000f80| 72 20 62 20 2d 2d 20 7d | 09 09 5c 20 44 72 61 77 |r b -- }|..\ Draw|
|00000f90| 73 20 61 20 62 69 67 20 | 58 20 61 63 72 6f 73 73 |s a big |X across|
|00000fa0| 20 74 68 65 20 76 69 65 | 77 20 61 72 65 61 2e 0d | the vie|w area..|
|00000fb0| 09 28 20 63 6c 65 61 72 | 3a 20 74 65 6d 70 72 65 |.( clear|: tempre|
|00000fc0| 63 74 20 29 20 20 67 65 | 74 3a 20 74 65 6d 70 52 |ct )  ge|t: tempR|
|00000fd0| 65 63 74 20 20 2d 3e 20 | 62 20 20 2d 3e 20 72 20 |ect  -> |b  -> r |
|00000fe0| 20 2d 3e 20 74 20 20 2d | 3e 20 6c 0d 09 30 20 30 | -> t  -|> l..0 0|
|00000ff0| 20 67 6f 74 6f 78 79 20 | 20 72 20 62 20 4c 69 6e | gotoxy | r b Lin|
|00001000| 65 54 6f 0d 09 6c 20 62 | 20 67 6f 74 6f 78 79 20 |eTo..l b| gotoxy |
|00001010| 20 72 20 30 20 4c 69 6e | 65 54 6f 20 20 3b 0d 0d | r 0 Lin|eTo  ;..|
|00001020| 27 20 64 72 77 20 20 73 | 65 74 44 72 61 77 3a 20 |' drw  s|etDraw: |
|00001030| 76 76 0d 0d 0d 3a 20 43 | 4c 49 43 4b 31 09 09 2e |vv...: C|LICK1...|
|00001040| 22 20 63 6c 69 63 6b 65 | 64 20 73 31 21 22 20 63 |" clicke|d s1!" c|
|00001050| 72 20 20 3b 0d 3a 20 43 | 4c 49 43 4b 32 09 09 2e |r  ;.: C|LICK2...|
|00001060| 22 20 63 6c 69 63 6b 65 | 64 20 73 32 21 22 20 63 |" clicke|d s2!" c|
|00001070| 72 20 20 3b 0d 0d 27 20 | 63 6c 69 63 6b 31 20 20 |r  ;..' |click1  |
|00001080| 20 73 65 74 43 6c 69 63 | 6b 3a 20 73 31 20 20 20 | setClic|k: s1   |
|00001090| 20 20 27 20 63 6c 69 63 | 6b 32 20 20 20 73 65 74 |  ' clic|k2   set|
|000010a0| 43 6c 69 63 6b 3a 20 73 | 32 0d 0d 3a 20 47 4f 0d |Click: s|2..: GO.|
|000010b0| 09 76 76 20 61 64 64 56 | 69 65 77 3a 20 73 32 20 |.vv addV|iew: s2 |
|000010c0| 20 73 32 20 20 61 64 64 | 56 69 65 77 3a 20 73 31 | s2  add|View: s1|
|000010d0| 0d 09 73 31 20 74 65 73 | 74 3a 20 77 77 0d 09 2d |..s1 tes|t: ww..-|
|000010e0| 6d 6f 64 65 6c 65 73 73 | 0d 09 24 20 46 35 45 46 |modeless|..$ F5EF|
|000010f0| 20 20 73 65 74 4d 61 73 | 6b 3a 20 66 45 76 65 6e |  setMas|k: fEven|
|00001100| 74 09 09 09 09 5c 20 6d | 61 73 6b 20 6f 75 74 20 |t....\ m|ask out |
|00001110| 6b 65 79 20 75 70 0d 09 | 42 45 47 49 4e 0d 09 09 |key up..|BEGIN...|
|00001120| 6e 65 78 74 3a 20 66 65 | 76 65 6e 74 0d 09 41 47 |next: fe|vent..AG|
|00001130| 41 49 4e 0d 3b 0d 0d 09 | 0d 3a 20 47 4f 52 45 53 |AIN.;...|.: GORES|
|00001140| 0d 09 76 76 20 61 64 64 | 56 69 65 77 3a 20 73 32 |..vv add|View: s2|
|00001150| 20 20 73 32 20 20 61 64 | 64 56 69 65 77 3a 20 73 |  s2  ad|dView: s|
|00001160| 31 0d 09 32 35 36 20 73 | 31 20 74 65 73 74 52 3a |1..256 s|1 testR:|
|00001170| 20 77 77 20 20 3b 0d 0d | 5c 20 65 6e 64 6c 6f 61 | ww  ;..|\ endloa|
|00001180| 64 0d 0d 0d 5c 20 4d 6f | 72 65 20 74 65 73 74 69 |d...\ Mo|re testi|
|00001190| 6e 67 20 2d 20 74 68 69 | 73 20 73 65 74 73 20 75 |ng - thi|s sets u|
|000011a0| 70 20 61 20 53 63 72 6f | 6c 6c 65 72 2e 0d 0d 73 |p a Scro|ller...s|
|000011b0| 63 72 6f 6c 6c 65 72 09 | 53 53 0d 62 75 74 74 6f |croller.|SS.butto|
|000011c0| 6e 09 09 42 42 09 09 09 | 5c 20 41 20 63 68 69 6c |n..BB...|\ A chil|
|000011d0| 64 20 76 69 65 77 20 77 | 68 69 63 68 20 69 73 20 |d view w|hich is |
|000011e0| 61 20 62 75 74 74 6f 6e | 0d 0d 0d 34 30 20 34 30 |a button|...40 40|
|000011f0| 20 33 30 30 20 32 30 30 | 09 73 65 74 42 6f 75 6e | 300 200|.setBoun|
|00001200| 64 73 3a 20 73 73 0d 0d | 31 30 20 31 30 20 20 22 |ds: ss..|10 10  "|
|00001210| 20 43 6c 69 63 6b 20 68 | 65 72 65 22 09 69 6e 69 | Click h|ere".ini|
|00001220| 74 3a 20 62 62 0d 0d 0d | 3a 20 44 72 61 77 69 74 |t: bb...|: Drawit|
|00001230| 09 64 72 61 77 3a 20 74 | 65 6d 70 52 65 63 74 20 |.draw: t|empRect |
|00001240| 20 3b 09 09 5c 20 41 20 | 64 72 61 77 20 68 61 6e | ;..\ A |draw han|
|00001250| 64 6c 65 72 20 77 68 69 | 63 68 20 6a 75 73 74 20 |dler whi|ch just |
|00001260| 64 72 61 77 73 20 74 68 | 65 20 76 69 65 77 52 65 |draws th|e viewRe|
|00001270| 63 74 0d 0d 3a 20 44 72 | 61 77 53 53 09 64 72 61 |ct..: Dr|awSS.dra|
|00001280| 77 3a 20 73 73 20 20 3b | 09 09 09 09 5c 20 44 72 |w: ss  ;|....\ Dr|
|00001290| 61 77 20 68 61 6e 64 6c | 65 72 20 66 6f 72 20 66 |aw handl|er for f|
|000012a0| 57 69 6e 64 20 66 6f 72 | 20 74 65 73 74 0d 0d 3a |Wind for| test..:|
|000012b0| 20 43 6c 69 63 6b 65 64 | 0d 09 6e 6f 63 6c 69 70 | Clicked|..noclip|
|000012c0| 0d 09 73 65 74 3a 20 74 | 77 09 2e 22 20 63 6c 69 |..set: t|w.." cli|
|000012d0| 63 6b 65 64 20 22 20 2e | 69 64 3a 20 5b 73 65 6c |cked " .|id: [sel|
|000012e0| 66 5d 20 63 72 0d 5c 20 | 4e 6f 77 20 77 65 20 65 |f] cr.\ |Now we e|
|000012f0| 78 70 61 6e 64 20 73 73 | 20 61 20 62 69 74 20 74 |xpand ss| a bit t|
|00001300| 6f 20 63 68 65 63 6b 20 | 69 66 20 74 68 65 20 73 |o check |if the s|
|00001310| 63 72 6f 6c 6c 20 62 61 | 72 73 20 6d 6f 76 65 20 |croll ba|rs move |
|00001320| 61 6e 64 20 72 65 73 69 | 7a 65 3a 0d 09 67 65 74 |and resi|ze:..get|
|00001330| 42 6f 75 6e 64 73 3a 20 | 73 73 0d 09 31 30 20 2b |Bounds: |ss..10 +|
|00001340| 0d 09 73 77 61 70 20 32 | 30 20 2b 20 73 77 61 70 |..swap 2|0 + swap|
|00001350| 0d 09 73 65 74 42 6f 75 | 6e 64 73 3a 20 73 73 20 |..setBou|nds: ss |
|00001360| 20 6d 6f 76 65 64 3a 20 | 73 73 20 20 3b 0d 0d 0d | moved: |ss  ;...|
|00001370| 3a 20 63 6f 6e 74 65 6e | 74 43 6c 69 63 6b 09 09 |: conten|tClick..|
|00001380| 09 5c 20 4e 65 77 20 63 | 6f 6e 74 65 6e 74 20 63 |.\ New c|ontent c|
|00001390| 6c 69 63 6b 20 68 61 6e | 64 6c 65 72 20 66 6f 72 |lick han|dler for|
|000013a0| 20 66 57 69 6e 64 0d 09 | 09 09 63 6c 69 63 6b 3a | fWind..|..click:|
|000013b0| 20 73 73 20 20 64 72 6f | 70 20 20 3b 0d 09 09 09 | ss  dro|p  ;....|
|000013c0| 0d 27 20 64 72 61 77 69 | 74 09 73 65 74 44 72 61 |.' drawi|t.setDra|
|000013d0| 77 3a 20 73 73 0d 0d 27 | 20 63 6c 69 63 6b 65 64 |w: ss..'| clicked|
|000013e0| 09 64 75 70 20 73 65 74 | 63 6c 69 63 6b 3a 20 73 |.dup set|click: s|
|000013f0| 73 20 20 73 65 74 63 6c | 69 63 6b 3a 20 62 62 0d |s  setcl|ick: bb.|
|00001400| 0d 3a 20 73 63 72 6f 6c | 6c 65 72 54 65 73 74 0d |.: scrol|lerTest.|
|00001410| 09 62 62 20 61 64 64 76 | 69 65 77 3a 20 73 73 0d |.bb addv|iew: ss.|
|00001420| 09 73 73 20 74 65 73 74 | 3a 20 77 77 0d 3b 00 00 |.ss test|: ww.;..|
|00001430| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001440| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001450| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001460| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001470| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001480| 00 00 01 00 00 00 01 42 | 00 00 00 42 00 00 00 3b |.......B|...B...;|
|00001490| 75 6c 61 74 65 20 69 74 | 73 20 64 61 74 61 2c 20 |ulate it|s data, |
|000014a0| 61 6c 6f 6e 67 20 77 69 | 74 68 20 69 6d 70 6c 65 |along wi|th imple|
|000014b0| 07 57 69 6e 64 6f 77 2b | 02 00 00 00 50 61 72 74 |.Window+|....Part|
|000014c0| 53 49 54 21 00 00 00 00 | 00 00 00 00 00 01 82 62 |SIT!....|.......b|
|000014d0| 00 00 50 61 72 74 53 49 | 54 21 00 00 00 00 00 00 |..PartSI|T!......|
|000014e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014f0| 00 00 b3 66 c2 7b 00 00 | 00 00 00 00 01 7d 09 31 |...f.{..|.....}.1|
|00001500| 32 20 42 79 74 65 73 20 | 09 6e 61 6d 65 09 54 65 |2 Bytes |.name.Te|
|00001510| 78 74 20 6e 61 6d 65 20 | 6f 66 20 64 72 69 76 65 |xt name |of drive|
|00001520| 72 2e 0d 09 31 32 20 42 | 79 74 65 73 20 09 68 65 |r...12 B|ytes .he|
|00001530| 61 64 65 72 09 46 69 65 | 6c 64 73 20 66 6f 72 20 |ader.Fie|lds for |
|00001540| 69 6e 74 65 72 6e 61 6c | 20 75 73 65 20 0d 09 56 |internal| use ..V|
|00001550| 61 72 09 49 4f 43 6f 6d | 70 09 41 62 73 6f 6c 75 |ar.IOCom|p.Absolu|
|00001560| 74 65 20 61 64 64 72 65 | 73 73 20 6f 66 20 49 4f |te addre|ss of IO|
|00001570| 20 63 6f 6d 70 6c 65 74 | 69 6f 6e 20 50 52 4f 43 | complet|ion PROC|
|00001580| 00 00 00 3e 00 00 00 00 | 00 00 00 00 00 00 00 00 |...>....|........|
|00001590| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 01 04 |........|........|
|000015b0| 00 00 01 04 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015c0| 00 00 00 00 01 00 00 00 | 01 42 00 00 00 42 00 00 |........|.B...B..|
|000015d0| 00 3b 01 63 29 68 24 5c | 00 00 00 1c 00 32 00 00 |.;.c)h$\|.....2..|
|000015e0| 4d 49 46 4f 00 00 00 0a | 00 80 00 00 00 00 00 00 |MIFO....|........|
|000015f0| 01 63 2c 18 08 4d 69 73 | 63 49 6e 66 6f 00 00 00 |.c,..Mis|cInfo...|
+--------+-------------------------+-------------------------+--------+--------+